home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 001 / qmsstins.arc / DELPHI.SCR < prev    next >
Encoding:
Text File  |  1987-09-20  |  640 b   |  29 lines
  1. ;   ******  REMEMBER TO REPLACE "FAKENAME" & "FAKEWORD" WITH YOUR OWN
  2.  
  3. ;   Delphi log-in script via tymnet
  4.  
  5. TURNOFF ECHO LINEFEED ANSI          ; set up...
  6.  
  7. SEND    "~~~~A"                     ; wait for tymnet garbage to stop
  8.  
  9. WAITFOR "please log in:"
  10.  
  11. SEND    "~DELPHI{"
  12.  
  13. WAITFOR "Username:"                 ; log into Delphi
  14.  
  15. SEND    "~FAKENAME{"
  16.  
  17. WAITFOR "Password:"
  18.  
  19. SEND    "~FAKEWORD{"
  20.  
  21. NOTE    ╔══════════════════════════════════════╗
  22. NOTE    ║          You're Online with          ║
  23. NOTE    ║               Delphi!                ║
  24. NOTE    ╚══════════════════════════════════════╝
  25.  
  26. BEEP    500
  27.  
  28. RETURN
  29.